home *** CD-ROM | disk | FTP | other *** search
- on exitFrame
- global gPathToSound, fileDelimiter, gMusicChannel
- if soundBusy(gMusicChannel) then
- go(the frame)
- else
- repeat while the volume of sound gMusicChannel > 0
- set the volume of sound gMusicChannel to the volume of sound gMusicChannel - 16
- updateStage()
- LingoPause(5)
- end repeat
- sound stop gMusicChannel
- set the actorList to []
- KillEmPuppets()
- go("Num Of Players")
- end if
- end
-
- on mouseDown
- global gPathToSound, fileDelimiter, gMusicChannel
- repeat while the volume of sound gMusicChannel > 0
- set the volume of sound gMusicChannel to the volume of sound gMusicChannel - 16
- updateStage()
- LingoPause(5)
- end repeat
- sound stop gMusicChannel
- set the actorList to []
- KillEmPuppets()
- go("Num Of Players")
- end
-
- on keyDown
- global gPathToSound, fileDelimiter, gMusicChannel
- repeat while the volume of sound gMusicChannel > 0
- set the volume of sound gMusicChannel to the volume of sound gMusicChannel - 16
- LingoPause(5)
- end repeat
- sound stop gMusicChannel
- set the actorList to []
- KillEmPuppets()
- go("Num Of Players")
- end
-